home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 50
/
Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso
/
Aminet
/
text
/
edit
/
tecoc-146.lha
/
tst.tec
< prev
next >
Wrap
Text File
|
1991-07-05
|
252b
|
7 lines
10u.n ! put 10 in main-level q-register .n !
@^U1/20u.n:m2/27:^U1 ! put 20u.n$:m2$$ in q-register 1 !
@^U2/:m3/27:^U2 ! put :m3$$ in q-register 2 !
@^U3/q.n=/27:^U3 ! put q.n=$$ into q-register 3 !